10 PRINTCHR$(147) 11 POKE53280,0:POKE53281,0 12 PRINT" [158]SETTING UP...PLEASE WAIT" 13 PRINT" OBJECT:" 14 PRINT"MATCH ALL NUMBERS THAT FACE EACH OTHER." 15 PRINT" WRITTEN BY" 16 PRINT" T.D.MCCUTCHEN 19 [153]"" 20 [153][199](142) 30 [151]52,48:[151]56,48 40 [151]56334,[194](56334)[175]254 50 [151]1,[194](1)[175]251 60 [129]I[178]0[164]511:[151]I[170]12288,[194](I[170]53248):[130] 70 [151]1,[194](1)[176]4 80 [151]56334,[194](56334)[176]1 90 [129]I[178]12504[164]12543:[135]A:[151]I,A:[130] 91 [129]I[178]12568[164]12631:[135]A:[151]I,A:[130] 92 [151]53272,([194](53272)[175]240)[170]12 93 [129]I[178]12680[164]13112:[151]I,255[171][194](I):[130] 100 [131]7,7,15,31,31,63,63,127,224,224,240,248,248,252,252,254 110 [131]0,0,1,1,3,7,7,15,0,0,128,128,192,224,224,240 115 [131]15,31,31,63,63,127,127,255,240,248,248,252,252,254,254,255 116 [131]255,127,127,63,63,31,31,15,255,254,254,252,252,248,248,240 120 [131]15,7,7,3,1,1,0,0,240,224,224,192,128,128,0,0 125 [131]127,63,63,31,31,15,7,7,254,252,252,248,248,240,224,224 126 [131]255,255,255,255,255,255,255,255 130 [153][199](147) 132 A1[178]49:A2[178]49:A3[178]49:A4[178]49:A5[178]49:A6[178]49:A7[178]49 133 B1[178]50:B2[178]50:B3[178]50:B4[178]50:B5[178]50:B6[178]50:B7[178]50 134 C1[178]51:C2[178]51:C3[178]51:C4[178]51:C5[178]51:C6[178]51:C7[178]51 135 D1[178]52:D2[178]52:D3[178]52:D4[178]52:D5[178]52:D6[178]52:D7[178]52 136 E1[178]53:E2[178]53:E3[178]53:E4[178]53:E5[178]53:E6[178]53:E7[178]53 137 F1[178]54:F2[178]54:F3[178]54:F4[178]54:F5[178]54:F6[178]54:F7[178]54 138 V[178]1562:U[178]55916:[141]906 139 V[178]1242:U[178]55596:[141]1006 140 V[178]1409:U[178]55763:[141]1106 141 V[178]1729:U[178]56083:[141]1206 142 V[178]1089:U[178]55443:[141]1306 143 V[178]1576:U[178]55930:[141]1406 144 V[178]1390:U[178]55744:[141]1506 145 K[178]1256:L[178]55610:[141]1999 151 [151]1088,1:[151]1241,2:[151]1255,3:[151]1408,4 152 [151]1561,5:[151]1575,6:[151]1728,7:[151]1389,8 190 [153][199](19) 192 [153]"" 194 [153]" DRIVE YOU NUTS" 195 [153]" WRITTEN BY" 196 [153]" T.D.MCCUTCHEN" 210 [153][199](19) 234 [153]"SYS MOVE OR ROTATE?" 235 [153]" M OR R " 236 [161]A$:[139]A$[178]""[167]236 240 [139]A$[178]"M"[167][141]280:[137]210 250 [139]A$[178]"R"[167][141]580:[137]210 251 [139]A$[178]"?"[167]3500 270 [137]236 271 [143] MOVE 280 [153][199](19) 295 [153]"SYS WICH ONE? " 296 [153]" 1-7 " 300 [161]A$:[139]A$[178]""[167]300 305 [139]A$[178]"1"[167]WO[178]1:[137]350 310 [139]A$[178]"2"[167]WO[178]2:[137]350 315 [139]A$[178]"3"[167]WO[178]3:[137]350 320 [139]A$[178]"4"[167]WO[178]4:[137]350 325 [139]A$[178]"5"[167]WO[178]5:[137]350 330 [139]A$[178]"6"[167]WO[178]6:[137]350 331 [139]A$[178]"7"[167]WO[178]7:[137]350 335 [137]300 350 [153][199](19) 370 [153]"SYS TO WHERE? " 371 [153]" A-G " 380 [161]A$:[139]A$[178]""[167]380 390 [139]A$[178]"A"[167]V[178]1089:U[178]55443:[141]3000:[137]480 400 [139]A$[178]"B"[167]V[178]1242:U[178]55596:[141]3000:[137]480 410 [139]A$[178]"C"[167]V[178]1256:U[178]55610:[141]3000:[137]480 420 [139]A$[178]"D"[167]V[178]1409:U[178]55763:[141]3000:[137]480 430 [139]A$[178]"E"[167]V[178]1562:U[178]55916:[141]3000:[137]480 440 [139]A$[178]"F"[167]V[178]1576:U[178]55930:[141]3000:[137]480 450 [139]A$[178]"G"[167]V[178]1729:U[178]56083:[141]3000:[137]480 460 [139]A$[178]"H"[167]V[178]1390:U[178]55744:[141]3000:[137]480 470 [137]380 480 [139]T[178]42[167]490 481 [142] 490 [153][199](19) 500 [153]"STOP " 501 [153]"STOP " 502 [153]"" 510 [139]WO[178]1[167][141]905:[142] 520 [139]WO[178]2[167][141]1005:[142] 530 [139]WO[178]3[167][141]1105:[142] 540 [139]WO[178]4[167][141]1205:[142] 550 [139]WO[178]5[167][141]1305:[142] 560 [139]WO[178]6[167][141]1405:[142] 561 [139]WO[178]7[167][141]1505:[142] 570 [143] ROTATE 580 [153][199](19) 600 [153]"SYS RIGHT OR LEFT? " 601 [153]" R OR L " 605 [161]A$:[139]A$[178]""[167]605 610 [139]A$[178]"L"[167]LR[178]1:[137]680 620 [139]A$[178]"R"[167]LR[178]2:[137]680 630 [137]605 680 [153][199](19) 699 [153]"SYS WICH ONE? " 700 [153]" 1-7 " 701 [161]A$:[139]A$[178]""[167]701 710 [139]A$[178]"1"[167]780 720 [139]A$[178]"2"[167]780 730 [139]A$[178]"3"[167]780 740 [139]A$[178]"4"[167]780 750 [139]A$[178]"5"[167]780 760 [139]A$[178]"6"[167]780 761 [139]A$[178]"7"[167]780 770 [137]701 780 [153][199](19) 800 [153]"STOP " 801 [153]"STOP " 802 [153]"" 810 [139]A$[178]"1"[167][141]900:[142] 820 [139]A$[178]"2"[167][141]1000:[142] 830 [139]A$[178]"3"[167][141]1100:[142] 840 [139]A$[178]"4"[167][141]1200:[142] 850 [139]A$[178]"5"[167][141]1300:[142] 860 [139]A$[178]"6"[167][141]1400:[142] 861 [139]A$[178]"7"[167][141]1500:[142] 900 [143] PRINT N1 901 [139]LR[178]1[167]903 902 [139]LR[178]2[167]904 903 W[178]A1:A1[178]D1:D1[178]C1:C1[178]F1:F1[178]E1:E1[178]B1:B1[178]W:W[178]0:[137]911 904 W[178]B1:B1[178]E1:E1[178]F1:F1[178]C1:C1[178]D1:D1[178]A1:A1[178]W:W[178]0:[137]911 905 K[178]N1:L[178]Q1:[141]1999 906 N1[178]V:K[178]V:Q1[178]U:[141]2000 911 V[178]N1:U[178]Q1:[151]V[170]2,A1:[151]V[170]44,D1:[151]V[170]164,C1:[151]V[170]202,F1 912 [151]V[170]160,E1:[151]V[170]40,B1:[151]V[170]82,49:[151]U,7:[142] 1000 [143] PRINT N2 1001 [139]LR[178]1[167]1003 1002 [139]LR[178]2[167]1004 1003 W[178]A2:A2[178]B2:B2[178]C2:C2[178]D2:D2[178]E2:E2[178]F2:F2[178]W:W[178]0:[137]1011 1004 W[178]F2:F2[178]E2:E2[178]D2:D2[178]C2:C2[178]B2:B2[178]A2:A2[178]W:W[178]0:[137]1011 1005 K[178]N2:L[178]Q2:[141]1999 1006 N2[178]V:K[178]V:Q2[178]U:[141]2000 1011 V[178]N2:U[178]Q2:[151]V[170]2,A2:[151]V[170]44,B2:[151]V[170]164,C2:[151]V[170]202,D2 1012 [151]V[170]160,E2:[151]V[170]40,F2:[151]V[170]82,50:[151]U,7:[142] 1100 [143] PRINT N3 1101 [139]LR[178]1[167]1103 1102 [139]LR[178]2[167]1104 1103 W[178]A3:A3[178]F3:F3[178]D3:D3[178]B3:B3[178]E3:E3[178]C3:C3[178]W:W[178]0:[137]1111 1104 W[178]C3:C3[178]E3:E3[178]B3:B3[178]D3:D3[178]F3:F3[178]A3:A3[178]W:W[178]0:[137]1111 1105 K[178]N3:L[178]Q3:[141]1999 1106 N3[178]V:K[178]V:Q3[178]U:[141]2000 1111 V[178]N3:U[178]Q3:[151]V[170]2,A3:[151]V[170]44,F3:[151]V[170]164,D3:[151]V[170]202,B3 1112 [151]V[170]160,E3:[151]V[170]40,C3:[151]V[170]82,51:[151]U,7:[142] 1200 [143] PRINT N4 1201 [139]LR[178]1[167]1203 1202 [139]LR[178]2[167]1204 1203 W[178]A4:A4[178]F4:F4[178]E4:E4[178]D4:D4[178]C4:C4[178]B4:B4[178]W:W[178]0:[137]1211 1204 W[178]B4:B4[178]C4:C4[178]D4:D4[178]E4:E4[178]F4:F4[178]A4:A4[178]W:W[178]0:[137]1211 1205 K[178]N4:L[178]Q4:[141]1999 1206 N4[178]V:K[178]V:Q4[178]U:[141]2000 1211 V[178]N4:U[178]Q4:[151]V[170]2,A4:[151]V[170]44,F4:[151]V[170]164,E4:[151]V[170]202,D4 1212 [151]V[170]160,C4:[151]V[170]40,B4:[151]V[170]82,52:[151]U,7:[142] 1300 [143] PRINT N5 1301 [139]LR[178]1[167]1303 1302 [139]LR[178]2[167]1304 1303 W[178]A5:A5[178]D5:D5[178]F5:F5[178]B5:B5[178]C5:C5[178]E5:E5[178]W:W[178]0:[137]1311 1304 W[178]E5:E5[178]C5:C5[178]B5:B5[178]F5:F5[178]D5:D5[178]A5:A5[178]W:W[178]0:[137]1311 1305 K[178]N5:L[178]Q5:[141]1999 1306 N5[178]V:K[178]V:Q5[178]U:[141]2000 1311 V[178]N5:U[178]Q5:[151]V[170]2,A5:[151]V[170]44,D5:[151]V[170]164,F5:[151]V[170]202,B5 1312 [151]V[170]160,C5:[151]V[170]40,E5:[151]V[170]82,53:[151]U,7:[142] 1400 [143] PRINT N6 1401 [139]LR[178]1[167]1403 1402 [139]LR[178]2[167]1404 1403 W[178]A6:A6[178]F6:F6[178]E6:E6[178]C6:C6[178]B6:B6[178]D6:D6[178]W:W[178]0:[137]1411 1404 W[178]D6:D6[178]B6:B6[178]C6:C6[178]E6:E6[178]F6:F6[178]A6:A6[178]W:W[178]0:[137]1411 1405 K[178]N6:L[178]Q6:[141]1999 1406 N6[178]V:K[178]V:Q6[178]U:[141]2000 1411 V[178]N6:U[178]Q6:[151]V[170]2,A6:[151]V[170]44,F6:[151]V[170]164,E6:[151]V[170]202,C6 1412 [151]V[170]160,B6:[151]V[170]40,D6:[151]V[170]82,54:[151]U,7:[142] 1500 [143] PRINT N7 1501 [139]LR[178]1[167]1503 1502 [139]LR[178]2[167]1504 1503 W[178]A7:A7[178]F7:F7[178]B7:B7[178]D7:D7[178]E7:E7[178]C7:C7[178]W:W[178]0:[137]1511 1504 W[178]C7:C7[178]E7:E7[178]D7:D7[178]B7:B7[178]F7:F7[178]A7:A7[178]W:W[178]0:[137]1511 1505 K[178]N7:L[178]Q7:[141]1999 1506 N7[178]V:K[178]V:Q7[178]U:[141]2000 1511 V[178]N7:U[178]Q7:[151]V[170]2,A7:[151]V[170]44,F7:[151]V[170]164,B7:[151]V[170]202,D7 1512 [151]V[170]160,E7:[151]V[170]40,C7:[151]V[170]82,55:[151]U,7:[142] 1998 [143] LAST SUB 1999 [151]L,2 2000 [151]K[170]0,27:[151]K[170]1,42:[151]K[170]2,42:[151]K[170]3,42:[151]K[170]4,28 2001 [151]K[170]39,29:[151]K[170]40,42:[151]K[170]41,42:[151]K[170]42,42:[151]K[170]43,42:[151]K[170]44,42 2002 [151]K[170]45,30 2003 [151]K[170]79,31:[151]K[170]80,42:[151]K[170]81,42:[151]K[170]82,42:[151]K[170]83,42:[151]K[170]84,42 2004 [151]K[170]85,35 2005 [151]K[170]119,36:[151]K[170]120,42:[151]K[170]121,42:[151]K[170]122,42:[151]K[170]123,42 2006 [151]K[170]124,42:[151]K[170]125,37 2007 [151]K[170]159,38:[151]K[170]160,42:[151]K[170]161,42:[151]K[170]162,42:[151]K[170]163,42 2008 [151]K[170]164,42:[151]K[170]165,39 2009 [151]K[170]200,40:[151]K[170]201,42:[151]K[170]202,42 2010 [151]K[170]203,42:[151]K[170]204,41:[142] 3000 [143] IS THERE 3001 T[178][194](V[170]2) 3002 [139]T[178]42[167][142] 3010 [153][199](19) 3011 [153]"ALREADY ONE IN" 3012 [153]" THAT SPOT! " 3013 [153]" PRESS A KEY " 3014 [161]A$:[139]A$[178]""[167]3014 3015 [153][199](19) 3016 [153]"STOP " 3017 [153]"STOP " 3018 [153]"STOP " 3020 [142] 3500 V[178]1562:U[178]55916:[141]1306 3501 V[178]1242:U[178]55596:[141]1406 3502 V[178]1409:U[178]55763:[141]1506 3503 V[178]1729:U[178]56083:[141]1206 3504 V[178]1089:U[178]55443:[141]906 3505 V[178]1576:U[178]55930:[141]1106 3506 K[178]1390:L[178]55744:[141]1999 3507 V[178]1256:U[178]55610:[141]1006 3508 [137]210